Public Class Parties
Inherits Component

'Group: NoPartyIDs
Private m_NoPartyIDs As New List(Of NoPartyIDsGroup)

<FieldInfo(GetType(NoPartyIDsGroup), 0)> _
Public ReadOnly Property NoPartyIDs As List(Of NoPartyIDsGroup)
Get
Return m_NoPartyIDs
End Get
End Property

Public Class NoPartyIDsGroup
Inherits Group

Private m_PartyID As String

<FieldInfo(GetType(PartyIDFieldInfo), 0)> _
Public Property PartyID() As String
Get
Return m_PartyID
End Get
Set (value As String)
m_PartyID = value
End Set
End Property

Private m_PartyIDSource As Char

<FieldInfo(GetType(PartyIDSourceFieldInfo), 1)> _
Public Property PartyIDSource() As Char
Get
Return m_PartyIDSource
End Get
Set (value As Char)
m_PartyIDSource = value
End Set
End Property

Private m_PartyRole As PartyRole

<FieldInfo(GetType(PartyRoleFieldInfo), 2)> _
Public Property PartyRole() As PartyRole
Get
Return m_PartyRole
End Get
Set (value As PartyRole)
m_PartyRole = value
End Set
End Property

'Group: NoPartySubIDs
Private m_NoPartySubIDs As New List(Of NoPartySubIDsGroup)

<FieldInfo(GetType(NoPartySubIDsGroup), 3)> _
Public ReadOnly Property NoPartySubIDs As List(Of NoPartySubIDsGroup)
Get
Return m_NoPartySubIDs
End Get
End Property

Public Class NoPartySubIDsGroup
Inherits Group

Private m_PartySubID As String

<FieldInfo(GetType(PartySubIDFieldInfo), 0)> _
Public Property PartySubID() As String
Get
Return m_PartySubID
End Get
Set (value As String)
m_PartySubID = value
End Set
End Property

Private m_PartySubIDType As Int32

<FieldInfo(GetType(PartySubIDTypeFieldInfo), 1)> _
Public Property PartySubIDType() As Int32
Get
Return m_PartySubIDType
End Get
Set (value As Int32)
m_PartySubIDType = value
End Set
End Property


End Class




End Class




End Class
